home *** CD-ROM | disk | FTP | other *** search
- ;
- name test
- page 55, 132
- ;
- ;
- ; Author: Bill Pease
- ;
- ; directions for assembly:
- ;
- ; masm test;
- ; link test;
- ; exe2bin test test.com
- ; erase test.obj
- ; erase test.exe
- ;
- cseg segment
- assume cs:cseg,ds:cseg
- org 100h
-
- start:
-
- test proc far
-
- assume cs:cseg,ds:cseg
-
- if1
- include macro.lib
- endif
-
- get_video_mode
- clear_screen
- print_box 10,10,22,78,1
- delay 5
- print_box 2,50,10,75,3
- delay 5
- print_box 15,60,21,70,2
- delay 5
- print_box 18,20,21,30,1
- delay 5
- print_box 5,0,8,20,2
- beep 3
-
- mov ah, 4ch
- int 21h
-
- test endp
-
-
- cseg ends
- end start